home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / basic / dialogic.zip / DIALOG20.DB < prev    next >
Text File  |  1990-01-31  |  2KB  |  69 lines
  1. DB(Level%, 1).Code = 1
  2. DB(Level%, 1).Y = 0
  3. DB(Level%, 1).X = 0
  4. DB(Level%, 1).Height = 16
  5. DB(Level%, 1).Wdth = 65
  6. DB(Level%, 1).BorderType = 1
  7. DB(Level%, 1).PrimaryColor = -c1
  8. DB(Level%, 1).WindowColor = -c1
  9. DB(Level%, 1).Text = "Introductory Remarks"
  10. DB(Level%, 1).TextColor = c2
  11. DB(Level%, 1).SecondaryColor = c1
  12. DB(Level%, 1).NumberOne = 25
  13.  
  14. LB(1).Text = "Dialog Software's dialog boxes fully support both the"
  15. LB(2).Text = "keyboard and mouse.  You may press the <Tab> key to move"
  16. LB(3).Text = "from one item to another.  The <Enter> key will allow you"
  17. LB(4).Text = "go to the next screen, while <Esc> will end this demo."
  18. LB(5).Text = " "
  19. LB(6).Text = "~NOTE: "
  20. LB(7).Text = "When a scroll bar is present to the right (such as now)"
  21. LB(8).Text = "the implication is that there is more text.  Please use"
  22. LB(9).Text = "the down arrow *repeatedly* or <PgDn> once to see more"
  23. LB(10).Text = "text before moving on..."
  24. LB(11).Text = "~                (Fantastic - you made it!)"
  25. LB(12).Text = " "
  26. LB(13).Text = "Throughout this demo, more text may be available by"
  27. LB(14).Text = "scrolling down.  A scroll bar to the right will indicate"
  28. LB(15).Text = "this."
  29. LB(16).Text = " "
  30. LB(17).Text = "Now press <Enter> to see the next screen, or press <TAB>"
  31. LB(18).Text = "to access the OK button and press the <Space> key.  You"
  32. LB(19).Text = "may also press <Alt>O.  If you have a mouse simply click"
  33. LB(20).Text = "on the <OK> command button."
  34.  
  35. DB(Level%, 2).Code = 3
  36. DB(Level%, 2).Y = 2
  37. DB(Level%, 2).X = 2
  38. DB(Level%, 2).Height = 10
  39. DB(Level%, 2).Wdth = 1
  40. DB(Level%, 2).WindowColor = c1
  41. DB(Level%, 2).PrimaryColor = c1
  42. DB(Level%, 2).SecondaryColor = c2
  43. DB(Level%, 2).SelectedColor = -1
  44. DB(Level%, 2).StarColor = c1
  45. DB(Level%, 2).ItemLength = 60
  46. DB(Level%, 2).KeyColor = 0
  47. DB(Level%, 2).BorderType = 2
  48. DB(Level%, 2).Link = 0
  49. DB(Level%, 2).TextY = 0
  50. DB(Level%, 2).TextX = 0
  51. DB(Level%, 2).TextColor = c1
  52. DB(Level%, 2).NumberOne = 1
  53. DB(Level%, 2).NumberTwo = 20
  54. DB(Level%, 2).Default = 0
  55.  
  56. DB(Level%, 3).Code = 7
  57. DB(Level%, 3).Y = 15
  58. DB(Level%, 3).X = 30
  59. DB(Level%, 3).Text = "~OK"
  60. DB(Level%, 3).PrimaryColor = c1
  61. DB(Level%, 3).WindowColor = c1
  62. DB(Level%, 3).SelectedColor = c3
  63. DB(Level%, 3).KeyColor = c4
  64. DB(Level%, 3).SecondaryColor = c4
  65. DB(Level%, 3).TextString = CHR$(13)
  66.  
  67. DB(Level%, 4).Code = 0
  68.  
  69.